1 PRINTCHR$(147)"LOADING...":PRINT
2 S=53000:REM *** CHANGE S TO RELOCATE ***
3 FORJ=STOS+119:READA:POKEJ,A:X=X+A:NEXTJ
4 IFX<>18560THENPRINT"ERROR IN DATA...":END
5 PRINT"THE DATA IS LOADED...":PRINT:PRINT"SYS"S"TO CHANGE THE PROMPT...":END
6 DATA169,160,162,0,160,224,133,252,134,251,132,254
7 DATA161,251,129,251,230,251,208,248,230,252,200,208
8 DATA243,162,55,208,64,32,68,229,169,118,160,163
9 DATA32,30,171,169,32,162,5,157,120,163,202,16
10 DATA250,134,212,232,134,198,134,204,134,253,32,228
11 DATA255,240,251,201,13,240,20,201,20,240,210,166
12 DATA253,224,6,176,237,157,120,163,32,210,255,230
13 DATA253,208,227,169,0,162,54,133,254,169,47,120
14 DATA133,0,134,1,88,169,32,32,210,255,165,254
15 DATA208,175,133,207,169,13,76,210,255,0,0,0